home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Demos / AppMaker 2.0b3 / Demo AppMaker 1.5 / Demo AppMaker™ / Demo AppMaker™.rsrc / TmpC_1002_CheckBox < prev    next >
Encoding:
Text File  |  1992-04-08  |  634 b   |  30 lines
  1. %case window field%
  2.     ControlHandle    %HandleName%;
  3.     Boolean            %fieldname%;
  4. %case create%
  5.     cur->%HandleName% = GetNewControl (%cntlID%, newWindow);
  6.     %Enable?%
  7.     cur->%fieldname% = false; 
  8. %case track%
  9.     if (whichControl == cur->%HandleName%) {
  10.         TrackCheck (cur->%HandleName%, where, &cur->%fieldname%);
  11.     }
  12. %case itemNr%
  13.     %DefineItem%
  14. %case dialog field%
  15.     Boolean            %fieldname%;
  16.     %Enable?%
  17.     %haveField%
  18. %case init field%
  19.     info->%fieldname% = false; 
  20.     %Enable?%
  21. %case set%
  22.     SetCheckbox (%Itemname%, info->%Fieldname%);
  23. %case enable%
  24.     %Enable?%
  25. %case hit%
  26.     case %itemname%:
  27.             DoCheckbox (itemNr, &info->%fieldname%);
  28.         break;
  29. %case finish%
  30.